function MakepAdminOptions()
	LocalPlayer():EmitSound("buttons/lightswitch2.wav", 100, 30)
	if not LocalPlayer():IsSuperAdmin() then
		return
	end

	if pAdminOptions then
		pAdminOptions:SetAlpha(0)
		pAdminOptions:AlphaTo(255, 0.5, 0)
		pAdminOptions:SetVisible(true)
		pAdminOptions:MakePopup()
		return
	end

	local wide, tall = 500, ScrH() * 0.9

	local Window = vgui.Create("DFrame")
	Window:SetSize(wide, tall)
	Window:Center()
	Window:SetTitle(" ")
	Window:SetDeleteOnClose(false)
	Window:SetCursor("pointer")
	pAdminOptions = Window

	local y = 8

	local label = EasyLabel(Window, GAMEMODE.Name.." Admin Options", "ScoreboardText", color_white)
	label:CenterHorizontal()
	label:AlignTop(4)
	y = y + label:GetTall() + 8

	local list = vgui.Create("DPanelList", pAdminOptions)
	list:Refresh()
	list:EnableVerticalScrollbar()
	list:EnableHorizontal(false)
	list:SetSize(wide - 24, tall - y - 12)
	list:SetPos(12, y)
	list:SetPadding(8)
	list:SetSpacing(4)

	list:AddItem(EasyLabel(Window, "NOTICE: Numbers only, stupid faggot.", "ScoreboardSub", COLOR_WHITE))

	list:AddItem(EasyLabel(Window, "", "DefaultSmall", COLOR_WHITE))

	list:AddItem(EasyLabel(Window, "Hovergear Minimum Racers", "DefaultSmall", COLOR_WHITE))
	local entry = vgui.Create("DTextEntry", Window)
	entry:SetConVar("hovergear_minracers")
	entry:SizeToContents()
	list:AddItem(entry)

	list:AddItem(EasyLabel(Window, "", "DefaultSmall", COLOR_WHITE))

	list:AddItem(EasyLabel(Window, "Hovergear Maximum Racers", "DefaultSmall", COLOR_WHITE))
	local entry = vgui.Create("DTextEntry", Window)
	entry:SetConVar("hovergear_maxracers")
	entry:SizeToContents()
	list:AddItem(entry)

	list:AddItem(EasyLabel(Window, "", "DefaultSmall", COLOR_WHITE))

	list:AddItem(EasyLabel(Window, "Hovergear Prerace Time in Seconds", "DefaultSmall", COLOR_WHITE))
	local entry = vgui.Create("DTextEntry", Window)
	entry:SetConVar("hovergear_prerace")
	entry:SizeToContents()
	list:AddItem(entry)

	list:AddItem(EasyLabel(Window, "", "DefaultSmall", COLOR_WHITE))

	list:AddItem(EasyLabel(Window, "Hovergear Race Time in Seconds", "DefaultSmall", COLOR_WHITE))
	local entry = vgui.Create("DTextEntry", Window)
	entry:SetConVar("hovergear_racetime")
	entry:SizeToContents()
	list:AddItem(entry)

	list:AddItem(EasyLabel(Window, "", "DefaultSmall", COLOR_WHITE))

	list:AddItem(EasyLabel(Window, "Hovergear Laps to Win", "DefaultSmall", COLOR_WHITE))
	local entry = vgui.Create("DTextEntry", Window)
	entry:SetConVar("hovergear_laps")
	entry:SizeToContents()
	list:AddItem(entry)

	Window:Center()
	Window:MakePopup()

	Window:SetAlpha(0)
	Window:AlphaTo(255, 0.5, 0)
	Window:MakePopup()
end

concommand.Add("hg_adminoptionsopen", MakepAdminOptions)